home *** CD-ROM | disk | FTP | other *** search
-
- void scan_clear_proc()
- {
- extern int scan_mdim,scan_mdim_init,scan_n_stored,scan_col_dim;
- extern int *scan_type;
- extern double **scan_x;
-
- all_reset();
- scan_n_stored=0;
- all_refresh();
- (void) free_dmatrix(scan_x,0,scan_mdim-1,0,scan_col_dim-1);
- (void) free_ivector(scan_type,0,scan_mdim-1);
- scan_mdim = scan_mdim_init;
- scan_x = (double **) dmatrix(0,scan_mdim-1,0,scan_col_dim-1);
- scan_type = (int *) ivector(0,scan_mdim-1);
- }
-
-